home *** CD-ROM | disk | FTP | other *** search
/ PsL Monthly 1999 June / PSL Volume 7 Number 6.iso / educa / win / lang_art / PPUNCH30.ZIP / DEMO.ZIP / PUNCH.EXE / 0 / RCDATA / TMAINF / TMAINF.txt < prev   
Text File  |  1998-03-18  |  3KB  |  126 lines
  1. object MainF: TMainF
  2.   Left = 0
  3.   Top = 116
  4.   ActiveControl = PressSpaceB
  5.   BorderIcons = [biSystemMenu]
  6.   BorderStyle = bsDialog
  7.   Caption = ' '
  8.   ClientHeight = 263
  9.   ClientWidth = 632
  10.   Color = 8454143
  11.   Font.Color = clBlack
  12.   Font.Height = -13
  13.   Font.Name = 'MS Sans Serif'
  14.   Font.Style = [fsBold]
  15.   Icon.Data = {<image000.ico>}
  16.   PopupMenu = PopupMenu1
  17.   Position = poScreenCenter
  18.   Visible = True
  19.   OnActivate = FormActivate
  20.   OnClose = FormClose
  21.   OnCreate = FormCreate
  22.   PixelsPerInch = 96
  23.   TextHeight = 16
  24.   object LogoP: TPanel
  25.     Left = 8
  26.     Top = 9
  27.     Width = 617
  28.     Height = 177
  29.     BevelInner = bvRaised
  30.     BevelWidth = 2
  31.     Color = clSilver
  32.     Font.Color = clBlack
  33.     Font.Height = -21
  34.     Font.Name = 'Arial'
  35.     Font.Style = [fsBold, fsItalic]
  36.     ParentFont = False
  37.     PopupMenu = PopupMenu1
  38.     TabOrder = 1
  39.     object Image1: TImage
  40.       Left = 541
  41.       Top = 104
  42.       Width = 66
  43.       Height = 38
  44.       Picture.Data = {<image001.bmp>}
  45.       PopupMenu = PopupMenu1
  46.       Stretch = True
  47.       Visible = False
  48.     end
  49.     object Title1: TLabel
  50.       Left = 4
  51.       Top = 4
  52.       Width = 609
  53.       Height = 24
  54.       Align = alTop
  55.       Alignment = taCenter
  56.       PopupMenu = PopupMenu1
  57.       Transparent = True
  58.     end
  59.     object Title2: TLabel
  60.       Left = 4
  61.       Top = 149
  62.       Width = 609
  63.       Height = 24
  64.       Align = alBottom
  65.       Alignment = taCenter
  66.       PopupMenu = PopupMenu1
  67.       Transparent = True
  68.     end
  69.   end
  70.   object PressSpaceB: TBitBtn
  71.     Left = 216
  72.     Top = 192
  73.     Width = 200
  74.     Height = 33
  75.     Caption = '&Start'
  76.     Default = True
  77.     PopupMenu = PopupMenu1
  78.     TabOrder = 0
  79.     OnClick = PressSpaceBClick
  80.     Glyph.Data = {
  81.       76010000424D7601000000000000760000002800000020000000100000000100
  82.       04000000000000010000120B0000120B00000000000000000000000000000000
  83.       80000080000000808000800000008000800080800000C0C0C000808080000000
  84.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033BBBBBBBBBB
  85.       BB33338888888888888F33BB00BBBBBBBB33338F88333333F38F33BB0BBBBBB0
  86.       BB33338F83F33338FF8F33BBB0BBBB000B33338F38FF3388838F33BBB00BB00B
  87.       BB33338F388F3883338F33BBBB0B00BBBB33338F338F8833338F33BBBB000BBB
  88.       BB33338F33888F33338F33EEEE000EEEEE33338F3F888FFF338F33EE0E70000E
  89.       EE33338F83F88883338F33EEE0700EEEEE33338F38388F33338F33EEEE000EEE
  90.       EE33338F33888F33338F33EEEEE00EEEEE33338F33388FF3338F33EEEEEE00EE
  91.       EE33338F333388F3338F33EEEEEE00EEEE33338F33338833338F33EEEEEEEEEE
  92.       EE33338FFFFFFFFFFF8F33EEEEEEEEEEEE333388888888888883}
  93.     NumGlyphs = 2
  94.   end
  95.   object CopyRightP: TPanel
  96.     Left = 8
  97.     Top = 232
  98.     Width = 617
  99.     Height = 25
  100.     Caption = '∩┐╜ Copyright 1997  All rights reserved  GTDR'
  101.     Color = clHighlight
  102.     Font.Color = clWhite
  103.     Font.Height = -11
  104.     Font.Name = 'MS Sans Serif'
  105.     Font.Style = []
  106.     ParentFont = False
  107.     PopupMenu = PopupMenu1
  108.     TabOrder = 2
  109.   end
  110.   object IntroTimer: TTimer
  111.     Enabled = False
  112.     Interval = 10
  113.     OnTimer = IntroTimerTimer
  114.     Left = 8
  115.   end
  116.   object PopupMenu1: TPopupMenu
  117.     Left = 40
  118.     Top = 1
  119.     object Import1: TMenuItem
  120.       Caption = 'Import'
  121.       ShortCut = 0
  122.       OnClick = Import1Click
  123.     end
  124.   end
  125. end
  126.